#e
#Title[Tus@ȉʎv]
#Text[]
#Image[]
#BackGround[]
#BGM[]
#PlayLevel[Extra]
#ScriptVersion[2]
#Player[FREE]

script_enemy_main
{
let wt=240;
let usebomb=0;

	//GoɈxs镔
	@Initialize
	{
	//   eϐ

	//   XyJ[hf[^
	SetLife(800);
	SetScore(100000);
	SetDamageRate(30,  0);
	SetTimer(80);
	SetInvincibility(250);
	LoadGraphic("script\img\ExRumia.png");
	LoadUserShotData(GetCurrentScriptDirectory~"..\img\usershot.txt");
	CutIn(KOUMA,"Tus@ȉʎv",GetCurrentScriptDirectory~"..\img\cutin05.png",0,0,255,320);

	}
	//   ʒu܂ňړ
	SetMovePosition02(GetCenterX, GetClipMinY+120, 60);

	BG_Standard;
	AtackTask;
	ControlTask;
	//G̃Ct0ɂȂ܂ŁA̕1t[1s
	@MainLoop
	{
		yield;


		if(OnBomb==false){
			SetCollisionA(GetX, GetY, 32);
			SetCollisionB(GetX, GetY, 24);
			usebomb=0;
		}
		else{
			usebomb++;
		}
		if(usebomb==1){
			BombBarrier;
		}
	}
	
	//`惋[vB1t[1s
	@DrawLoop
	{
		SetGraphicRect(0,1,63,64);
		if(GetSpeedX<0){
			SetGraphicRect(128,1,191,64);
		}
		if(GetSpeedX>0){
			SetGraphicRect(192,1,255,64);
		}
		SetColor(255,255,255);
		SetAlpha(255);
		if(OnBomb==true){SetAlpha(96);}
		SetTexture("script\img\ExRumia.png");//摜͔q
		DrawGraphic(GetX(),GetY());//G̍WEx[~A`;
	}
		
	//GłuԂɈxs镔
	@Finalize
	{
		DeleteGraphic("script\img\ExRumia.png");
		DeleteGraphic(GetCurrentScriptDirectory ~"..img\back1.png");
		DeleteGraphic(GetCurrentScriptDirectory ~"..img\back2.png");
	}
	//XyJ[h̔wi
	//Ă悢
	@BackGround
	{
		BG_Simple;
	}

	task AtackTask{
		wait(120);
		loop{
			AtackSub(5);
			wait(wt);
			AtackSub(-5);
			wait(wt);
		}
	}
	task AtackSub(rot){
		let nwaya=8;
		let dira=rand(0,360);
		let dirb=dira;
		loop(nwaya){
			CreateShotA(0,GetX,GetY,20);
			SetShotDataA(0,0,3,dira,0,-0.03,0,31);
			SetShotKillTime(0,51);
			let nwayb=16;
			loop(nwayb){
				let dirc=0;
				ascent(i in 3..9){
					CreateShotA(1,cos(dirb)*i*16,sin(dirb)*i*16,10+i*2);
					SetShotDataA(1,0,0,dirb+(i*rot),0,0,0,PURPLE12);
					SetShotDataA(1,i+8,NULL,NULL,0,0.05,2.0,NULL);
					AddShot(50,0,1,0);
					dirc+=rot;
				}
				dirb+=360/nwayb;
			}
			FireShot(0);
			dira+=360/nwaya;
		}
		wait(20);
		MoveTask;
	}
	task MoveTask{		//@Ɉړp^[(^XNĂяo^Cv)
		let ptn=0;
		if(GetX<GetCenterX-80){ptn=1;}
		if(GetX>GetCenterX+80){ptn=2;}
		if(ptn==0){
			if(GetX<GetPlayerX){ptn=1;}
			else{ptn=2;}
		}
		if(ptn==1){
			SetMovePosition02(rand(GetX+40,GetX+60), rand(GetClipMinY+80,GetClipMinY+120), 40);
		}
		if(ptn==2){
			SetMovePosition02(rand(GetX-40,GetX-60), rand(GetClipMinY+80,GetClipMinY+120), 40);
		}
	}

	task ControlTask{
		wait(250);
		while(GetEnemyLife>600&&GetTimer>20){yield;}
		wt=220;
		while(GetEnemyLife>400&&GetTimer>20){yield;}
		wt=200;
		while(GetEnemyLife>200&&GetTimer>20){yield;}
		wt=180;
		while(GetTimer>20){yield;}
		wt=160;
	}

	#include_function".\function.txt"
}

